(load_warn_old_style_backquotes): Fix up array size typo.

diff --git a/src/ChangeLog b/src/ChangeLog
index 902e71b8e38934053c817d85376144c8449af413..23be2658445056b3db95a78f333158d4d3a96e01 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2007-08-23  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * lread.c (load_warn_old_style_backquotes): Fix up array size typo.
+
 2007-08-22  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * lread.c (Qold_style_backquotes): New var.

diff --git a/src/lread.c b/src/lread.c
index 20eafbcd5eea5baf25fd8d03fc973cf5f4be9b84..be2d3a77cf53b0bc9aea803860cefc271d9a2dab 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -705,8 +705,8 @@ load_warn_old_style_backquotes (file)
 {
   if (!NILP (Vold_style_backquotes))
     {
-      Lisp_Object args[1];
-      args[0] = build_string ("!! File %s uses old-style backquotes !!");
+      Lisp_Object args[2];
+b      args[0] = build_string ("!! File %s uses old-style backquotes !!");
       args[1] = file;
       Fmessage (2, args);
     }